MODULE Hello;

FROM SYSTEM IMPORT CODE;
(*
 * Melden Sie ONYX.TTP in Clix unter ONYX im Pfade...-Dialog an.
 * Wenn Sie diesen Text geladen haben, k”nnen Sie ihn mit SHIFT-F10 oder dem
 * Men�punkt Modula/ONYX assemblieren. Dabei werden die CODE-Anweisungen neu
 * erzeugt.
 *
 * Allgemein werden Assembler-Passagen in "(*\=" ... "\*)" geklammert, wobei
 * das ”ffnende "(*\=" am Zeilenanfang stehen muž. ONYX generiert daraus CODE-
 * Anweisungen, die davor geschrieben werden. Es k”nnen mehrere Assembler-
 * Passagen in einem Text auftauchen.
 *
 * Bitte beachten Sie:
 *
 * In der Demo-Version kann man nur insgesamt 80 Bytes assemblieren!
 *
 * Im Lieferumfang von ONYX ist ein ausf�hrliches Handbuch und ein Online-
 * Manual mit s„mtlichen MC68000-Befehlen enthalten.
 *)

BEGIN
(*\ONYX v2.00	21.11.92 22:49*)(*$D-*)
(*58 bytes of MC68030 code*)

CODE(0487AH,0000EH);

CODE(03F3CH,00009H);

CODE(04E41H);

CODE(05C8FH);

CODE(04267H);

CODE(04E41H);

CODE(04D69H,07420H,04F4EH,05958H,02061H,07373H,0656DH,0626CH,06965H,07274H,00D0AH,06D69H,07420H,0484DH,03220H,0636FH,06D70H,0696CH,06965H,07274H,00000H);

(*$D=*)
(*\= 
equ	  GEMDOS  1

		  pea 	 str(pc)
		  move.w  #9,-(sp)		  ; Cconws
		  trap	 #GEMDOS
		  addq.l  #6,sp
		  clr.w	 -(sp)			  ; Pterm0
		  trap	 #GEMDOS

str	  dc.b	 "Mit ONYX assembliert",$D,$A,"mit HM2 compiliert",$0 \*)
END Hello.

			
	
	